home *** CD-ROM | disk | FTP | other *** search
/ CyberMycha 2008 January / Cybermycha 1_2008.iso / Data.cab / _115FE24886E84AB2833D83B4F17E3C56 < prev    next >
Encoding:
Text File  |  2004-03-19  |  919 b   |  35 lines
  1. regc(0, "TFACTOR")
  2. regc4f( 5, %daycolor_r, %daycolor_g, %daycolor_b, %sunvisibility )
  3. regc4f( 7, %ambient_r, %ambient_g, %ambient_b, %ambient_a )
  4. pshader("
  5.  
  6. ps_1_1
  7.  
  8. def c1, 0.0, 0.0, 0.0, 0.3
  9. ;def c1, 0.0, 0.0, 0.0, 1.0
  10.  
  11. tex t0 ;texture (RGB - color, A<0-127> - Opacity, A<128-255> - Specular Mask)
  12. tex t1 ;Terrain lightmap
  13.  
  14.  
  15.     mul            r1.rgb, t1.a, v0                ;multiplying shadows
  16.     +mul_x2_sat    r1.a, t0.a, c5.a                ;extraction specular mask
  17.  
  18.     mad_sat        r0.rgb, v1, r1.a, t0            ;applying specular to color
  19.     +mad_sat    r0.a, r1.b, c7.b, c7.a            ;applying ambient to lighting
  20.  
  21.     mul            r0.rgb, r0, r0.a                ;applying lighitng to color
  22.     +mul_x4_sat r0.a, t0.a, c1.a                ;extraction opacity mask
  23.     ;+mov_x2_sat r0.a, t0.a
  24.  
  25.     ;mul_x2_sat r0.a, r0.a, c1.a
  26.  
  27.     mul         r0.rgb, r0, c5                  ;applying daytime to color
  28.     +mul        r0.a, r0.a, c0.a                   ;Opacity Mask * Object blending
  29.  
  30.  
  31.  
  32. ")
  33.  
  34.  
  35.